﻿Public Class TipoCliente
    Public Property id As Integer
    Public Property nombre As String
    Public Sub New(ByVal id As Integer, ByVal nombre As String)
        Me.id = id
        Me.nombre = nombre
    End Sub
    Public Sub New(ByVal nombre As String)

        Me.nombre = nombre
    End Sub
    Public Sub New()

    End Sub
End Class
